home *** CD-ROM | disk | FTP | other *** search
/ Sports Illustrated for Kids - Awesome Athletes! / Sports Illustrated for Kids - Awesome Athletes!.iso / iv.dir / 00043_previous button callback.ls < prev    next >
Encoding:
Text File  |  1996-04-19  |  1.7 KB  |  48 lines
  1. on mouseDown
  2.   global givState
  3.   MessagePut("in previous button callback")
  4.   set clik to the clickOn
  5.   if count(the questionSelectList of givState) < 1 then
  6.     nothing()
  7.     exit
  8.   end if
  9.   PlaySoundWait("CLIK2.AIF")
  10.   if the mode of givState = #edit then
  11.     set the castNum of sprite clik to the number of cast "previous button down"
  12.     set tmp to the number of cast "previous button down"
  13.   else
  14.     set the castNum of sprite clik to the number of cast "play mode previous button down"
  15.     set tmp to the number of cast "play mode previous button down"
  16.     MessagePut("HV: " && the locH of sprite clik && the locV of sprite clik)
  17.   end if
  18.   updateStage()
  19.   repeat while the stillDown
  20.     nothing()
  21.   end repeat
  22.   MessagePut("the mouseCast " && the mouseCast)
  23.   if the mouseCast = tmp then
  24.     if (the activeVideoMode of givState = #play) or (the activeVideoMode of givState = #pause) then
  25.       pass()
  26.     else
  27.       MessagePut("question select list" && the questionSelectList of givState)
  28.       set ct to count(the questionSelectList of givState)
  29.       if ct > 0 then
  30.         set ptr to the selectListPlaybackPtr of givState
  31.         set ptr to ptr - 1
  32.         if ptr < 1 then
  33.           set ptr to ct
  34.         end if
  35.         set the selectListPlaybackPtr of givState to ptr
  36.         SetMonitorPtr(givState, the activeMonitor of givState, getAt(the questionSelectList of givState, ptr))
  37.         SetQuestionTextBoxHilite(getAt(the questionSelectList of givState, ptr))
  38.         DisplayMonitor(the activeMonitor of givState)
  39.       end if
  40.     end if
  41.   end if
  42.   if the mode of givState = #edit then
  43.     set the castNum of sprite clik to the number of cast "previous button"
  44.   else
  45.     set the castNum of sprite clik to the number of cast "play mode previous button"
  46.   end if
  47. end
  48.